unit Class_P4;

interface

uses
  SysUtils, Classes, DataEngine;

type
  TP4 = class(TBaseClass)
  public
    YUE: Integer;
    JZR: string;
    JZSJ: string;
  public
    destructor Destroy; override;
  end;

implementation

{ TP4 }

destructor TP4.Destroy;
begin

  inherited;
end;

end.
